﻿<%
set rs11=Server.CreateObject("ADODB.Recordset")
strsQL="select ids from zb where ids="&mynid
rs11.open strsQL,liao,1,2
if (rs11.bof and rs11.eof) then
rs11.addnew
rs11("ids")=mynid
rs11.update
end if
        rs11.Close
	Set rs11=Nothing
set rs12=Server.CreateObject("ADODB.Recordset")
strsQL="select ids from sx where ids="&mynid
rs12.open strsQL,liao,1,2
if (rs12.bof and rs12.eof) then
rs12.addnew
rs12("ids")=mynid
rs12.update
end if
        rs12.Close
	Set rs12=Nothing
set rs13=Server.CreateObject("ADODB.Recordset")
strsQL="select ids from wupin where ids="&mynid
rs13.open strsQL,liao,1,2
if (rs13.bof and rs13.eof) then
rs13.addnew
rs13("ids")=mynid
rs13.update
end if
        rs13.Close
	Set rs13=Nothing
%>
